]ND

4 -1 roll 10 -3 roll $Blend 4 -1 roll 7 -3 roll $Blend}bind

{4 -1 roll 16 -3 roll $Blend 4 -1 roll 13 -3 roll $Blend

{3 -1 roll 12 -3 roll $Blend 3 -1 roll 9 -3 roll $Blend 3 -1 roll 6 3 roll $Blend}bind

{exch 8 -3 roll $Blend exch 5 2 roll $Blend}bind

{4 1 roll $Blend}bind

{}{}{}{}{}{}{}{}{}{}

}executeonly

ifelse

ifelse}

{dup /strtlck known{/strtlck get exec}{pop 3}ifelse}

{/startlock get exec}

dup /startlock known

{1183615869 systemdict /internaldict get exec

{pop 3}

{systemdict /internaldict known not

[{}{}{}

/OtherSubrs